* info-look.el: Add setup for apropos-mode to use emacs-lisp-mode

manuals, similar to existing setup for help-mode.  (My bug#3913.)

diff --git a/lisp/info-look.el b/lisp/info-look.el
index a061611aa9b7acc23d0811481c4abd2a8c83c17f..7c9c124eb395c09d8a25e252b3f05e877605def6 100644 (file)
--- a/lisp/info-look.el
+++ b/lisp/info-look.el
@@ -861,6 +861,12 @@ Return nil if there is nothing appropriate in the buffer near point."
              ;; sort of fallback match scheme existed.
              ("(elisp)Index"          nil "^ -+ .*: " "\\( \\|$\\)")))
 
+;; docstrings talk about elisp, so have apropos-mode follow emacs-lisp-mode
+(info-lookup-maybe-add-help
+ :mode 'apropos-mode
+ :regexp "[^][()`',\" \t\n]+" ;; same as emacs-lisp-mode above
+ :other-modes '(emacs-lisp-mode))
+
 (info-lookup-maybe-add-help
  :mode 'lisp-interaction-mode
  :regexp "[^][()`',\" \t\n]+"